gusucode.com > 精典源码Delphi061:档案管理程序v1.0(SQL Server)源码程序 > 精典源码Delphi061:档案管理程序v1.0(SQL Server)源码程序/精典源码Delphi061:档案管理程序v1.0(SQL Server)/DAGL 档案管理程序 v1.0 (SQL Server)/挡案管理系统/档案表/档案.txt
create table sz_qz ( --全宗表 qz_dm varchar(10) not null primary key,--全宗表_代码 qz_mc varchar(100) not null,--全宗表_名称 qz_qzlb varchar(100),--全宗表_全宗类别 qz_ssnd varchar(60) ,/*全宗表_所属年代*/ qz_jgsj varchar(60), --全宗表_进馆时间 qz_jgmlh varchar(60),--全宗表_进馆目录号 qz_jgsxh varchar(60) --全宗表_进馆顺序号 )--TABLE1 CREATE TABLE sz_qzlb ( --全宗类别表 qzlb_dm int,--全宗类别代码 qzlb_mc varchar(60)--全宗类别名称 )--TABLE2 create table sz_xtajlb ( --系统案卷类别表 xt_dm varchar(10) not null primary key,--系统_代码 xt_mc varchar(60) not null,--系统案卷类别表_名称 xt_kfbj varchar(10) not null,--系统案卷类别表_可否编辑 xt_sm varchar(100)--系统案卷类别表_说明 )--TABLE3 create table sz_ajlb (--案卷类别4 ajlb_dm varchar(30) not null primary key,-- ajlb_mc varchar(60) not null,-- ajlb_sm varchar(100) not null,-- ajlb_js int not null,-- ajlb_sjlbdm varchar(30),-- qz_dm varchar(10) not null,-- xt_dm varchar(10) not null-- )--Talbe4 create table sz_wjlb ( --文件类别代码 wjlb_dm varchar(30) not null primary key,--文件类别代码_代码 wjlb_mc varchar(60) not null,--文件类别代码_名称 wjlb_sm varchar(100),--文件类别代码_说明 wjlb_js int not null,--文件类别代码_级数 wjlb_sjlbdm varchar(30)--文件类别代码_上级类别代码 )--TABLE5 create table sz_bgqx ( --保管期限表 bgqx_dm varchar(10) not null primary key,--保管期限表_代码 bgqx_mc varchar(60) not null,--保管期限表_名称 bgqx_sm varchar(100)--保管期限表_说明 )--table6 create table sz_mj (--密级表 mj_dm varchar(10) not null primary key,--密级表-代码 mj_mc varchar(60) not null,--密级表-名称 mj_sm varchar(100)--密级表-说明 )--Table7 create table sz_jyfs (--借阅方式 jyfs_dm varchar(10) not null primary key,--借阅方式-代码 jyfs_mc varchar(60) not null,--借阅方式-名称 jyfs_sm varchar(100)--借阅方式-说明 )--Table8 create table sz_jymd ( --借阅说明- jymd_dm varchar(10) not null primary key, --借阅说明-代码 jymd_mc varchar(60) not null, --借阅说明-名称 jymd_sm varchar(100) --借阅说明-说明 )--Table9 create table sz_ztlb (--载体类别表- ztlb_dm varchar(10) not null primary key,--载体类别表-代码 ztlb_mc varchar(60) not null,--载体类别表-名称 ztlb_sm varchar(100)--载体类别表-说明 )--Table10 create table sz_zjlb (--证件类别表- zjlb_dm varchar(10) not null primary key,--证件类别表-代码 zjlb_mc varchar(60) not null,--证件类别表-名称 zjlb_sm varchar(100)--证件类别表-说明 )--Table11 create table sz_bm (--部门表- bm_dm varchar(30) not null primary key,--部门表-代码 bm_mc varchar(60) not null,--部门表-名称 bm_js int not null,--部门表-级数 bm_sm varchar(100) not null,--部门表-说明 bm_sjbmdm varchar(30)--部门表-上级部门代码 )--Table12 create table sz_yg (--员工表 yg_dm varchar(30) not null primary key,--员工代码 Yg_xm varchar(40) not null,--员工姓名 bm_dm varchar(30) not null--部门代码 )--table13 create table sz_kw (--库位表 kw_dm varchar(30) not null primary key,--库位代码 kw_mc varchar(60) not null,--库位名称 kw_js int not null,--库位级数 kw_sm varchar(100) not null,--库位说明- kw_sjkwdm varchar(30)--库位上级库位代码 )--table14 create table xt_rz (--系统日志 rz_xh int not null primary key,--日志序号 User_name varchar(30) not null,--用户名 rz_czsj datetime not null,--日志操作时间 rz_nr varchar(200), --日子内容 rz_computer varchar(40)--日志计算机名 )--table15 create table xt_lbjs (--表16类别级数 lb_dm varchar(30) not null primary key,--类别代码 lb_mc varchar(60) ,--类别名称 lbjs_sm varchar(10),--类别级数说明 lb_dmcd int,--类别代码长度 lb_dmlx varchar(1)--代码类型 )--16 create table xt_ajcs (--表17案卷参数表 ajcs_dm varchar(10) not null primary key,--案卷参数代码 ajcs_mc varchar(60),--名称 ajcs_gz varchar(60)--规则 )--17 create table xt_UserGroup (--用户组 yhz_dm varchar(10) not null primary key,--用户组代码 yhz_mc varchar(60),--用户组名称 yhz_sm varchar(100)--用户组说明 js_dm varchar(10) not null--角色 )--18 create table xt_user (--用户表 user_dm varchar(10) not null primary key,--用户代码 user_name varchar(30) not null,--用户名称 user_sm varchar(60),--用户说明 user_ygdm varchar(30),--员工代码 user_password varchar(20) not null--用户密码 )--19 create table xt_UandG (--用户组分配表 ug_xh int not null primary key,--序号 yhz_dm varchar(10) not null,--用户组代码 user_dm varchar(10) not null--用户代码 )--20 create table xt_cdqx (--菜单权限 cdqx_cdmc varchar(30) not null,--菜单名称 yhz_dm varchar(10) not null--用户组代码 )--21 create table xt_lbqx (--类别代码 ajlb_dm varchar(30) not null,--案卷类别代码 yhz_dm varchar(10) not null--用户组代码 )--22 create table xt_mjqx (--密级权限 mj_dm varchar(10) not null,--密级代码 yhz_dm varchar(10) not null--用户组代码 )--23 create table sz_ajzt (--案卷状态 ajzt_dm varchar(10) not null,--案卷状态代码 ajzt_mc varchar(60) not null,--案卷状态名称 ajzt_sm varchar(100)--案卷状态说明 )--24 CREATE TABLE [dbo].[Am_ajgl] ( --表案卷管理 [aj_ndh] [varchar] (10) NOT NULL, [aj_xh] [int] IDENTITY (1, 1) NOT NULL , [ajlb_dm] [varchar] (20) NULL , [aj_dh] [varchar] (20) NULL , [aj_ys] [int] NULL , [aj_tm] [varchar] (100) NULL , [aj_bzqsrq] [datetime] NULL , [aj_bzjsrq] [datetime] NULL , [aj_gdqsrq] [datetime] NULL , [aj_gdjsrq] [datetime] NULL , [bgqx_dm] [varchar] (10) NOT NULL , [mj_dm] [varchar] (10) NOT NULL , [aj_ljr] [varchar] (20) NULL , [aj_zrz] [varchar] (50) NULL , [aj_jcr] [varchar] (20) NULL , [kw_dm] [varchar] (20) NULL , [aj_ztc] [varchar] (50) NULL , [aj_ty] [varchar] (100) NULL , [aj_sfrk] [varchar] (1) NULL , [aj_fz] [varchar] (100) NULL , [User_name] [varchar] (20) NOT NULL , [aj_wsh] [varchar] (20) NULL , [aj_dm] [varchar] (10) NULL , [ajzt_dm] [varchar] (2) NULL ) --25 CREATE TABLE [dbo].[dagl_wjgl] ( --文件类别 [wjlb_dm] [varchar] (20) NULL , [wj_ndh] [varchar] (10) NULL , [wj_xh] [int] IDENTITY (1, 1) NOT NULL primary key, [ajlb_dm] [varchar] (20) NULL , [aj_xh] [int] NULL , [wj_ys] [int] NULL , [wj_jnxh] [int] NULL , [wj_hh] [varchar] (10) NULL , [wj_dh] [varchar] (50) NULL , [wj_tm] [varchar] (100) NULL , [wj_zrz] [varchar] (50) NULL , [wj_rq] [datetime] NULL , [wj_gdrq] [datetime] NULL , [bgqx_dm] [varchar] (10) NULL , [mj_dm] [varchar] (10) NULL , [ztlb_dm] [varchar] (10) NULL , [wj_ty] [varchar] (100) NULL , [wj_ztc] [varchar] (50) NULL , [wj_fz] [varchar] (100) NULL , [user_name] [varchar] (20) NOT NULL , [wj_wsh] [varchar] (20) NULL , [wj_dm] [varchar] (10) NULL , [wj_yc] [int] NULL )--Table26 create table Am_wjfj (--文件附件表 wj_xh int not null,--文件附件序号 wjfj_xh int identity(1,1) not null primary key,--文件附件序号 wjfj_tm varchar(100)--文件附件题名 )--table27 create table AM_yjml (--表28移交目录 ajyj_xh int not null,--移交目录序号 aj_xh int not null--移交序号 )--Table28 create table Am_ajyj (--案卷移交表 ajyj_xh int identity(1,1) not null primary key,--序号 ajyj_yjr varchar(30) not null,--移交人 ajyj_yjdw varchar(60) not null,--移交单位 ajyj_jsdw varchar(60) not null,--接收单位 ajyj_yjrq datetime not null,--移交日期 ajyj_fz varchar(200) ,--附注 User_name varchar(30)--用户名 )--table29 create table AM_ajxh (--销毁鉴定表 aj_xh int not null,--案卷序号 aj_ajxh int identity(1,1) not null primary key,--案卷销毁序号 ajxh_jdrq datetime,--鉴定序号 ajxh_jdyy varchar(200),--鉴定原因/销毁原因 ajxh_jdyj varchar(200),--鉴定意见/鉴定意见 ajxh_jdr varchar(30),--鉴定人 ajxh_xhrq datetime,--销毁日期 ajxh_xhr varchar(30) )--table30 create table Am_kwzk (--库位状况表 kwzk_xh int identity(1,1) not null primary key,--序号 kwzk_rq datetime not null,--日期 kw_dm varchar(30)not null,--代码 kwzk_wd varchar(30),--温度 kwzk_sd varchar(30),--湿度 kwzk_bz varchar(200)--备注 )--table31 create table Am_dz (--读者表 dz_dm varchar(10) not null primary key,--读者代码 dz_xm varchar(30) not null,--读者姓名 dz_dw varchar(60),--读者单位 dz_lxdh varchar(30),--电话 dz_lxdz varchar(60),--联系地址 dz_dzyj varchar(60),--电子邮件 zjlb_dm varchar(10),--证件类别代码 dz_zjh varchar(30),--证件号 dz_djsj datetime,--登记时间 jygz_xh int--借阅规则序号 )--Table32 create table Am_jygz (--借阅规则 jygz_xjsl int,--限借数量 jygz_xjts int,--限借天数 jygz_xjtj varchar(1),--续借条件(逾期未还可否续借) jygz_jyjb varchar(60) not null,--借阅级别 jygz_xh int identity not null primary key--借阅规则序号 )--Table33 create table Am_jygl (--借阅管理 dz_dm varchar(10) ,--读者代码 aj_xh int,--案卷序号 jy_xh int identity(1,1) not null primary key,--借阅序号 jyfs_dm varchar(10),--借阅方式代码 jy_jyrq datetime,--借阅日期 jy_yhrq datetime,--应还日期 jy_ghrq datetime,--归还日期 jymd_dm varchar(10),--借阅目的代码 jy_jsr varchar(30),--经手人 jy_bz varchar(200),--备注 jy_ghzt varchar(1),--归还状态 jy_xjcs int --许借次数 )--Table34 create table Am_cx (--查询 cx_xh int identity(1,1)not null primary key, --查询序号 cx_mc varchar(60) not null,--查询名称 user_dm varchar(10) not null,--用户代码 cx_sql text not null,--查询语句 cx_lb varchar(10) not null--查询类别(文件,案卷) )--Table35 create table Sz_ztcl (--主题词类 ztcl_dm varchar(30) not null primary key, --主题词代码 ztcL_mc varchar(60) not null,--主题词名称 ztcl_sjdm varchar(30),--主题词上级代码 ztcl_js int not null--主题词级数 )--Table36 create table sz_ztck (--主题词库 ztck_dm varchar(30) not null ,--主题词库代码 ztck_ztcdm varchar(30) not null primary key,--主题词库代码 ztck_ztc varchar(60) not null--主题词库主题词 )--Table37 create table xt_js (--角色表38 js_mc varchar(20) not null,--角色名称 js_dm varchar(10) not null,--角色代码 js_sm varchar(50),--角色说明 ) create procedure P_Ajgl @str varchar(40) as select * from V_ajgl where ajlb_dm=@str --创建存储过程P_Ajgl,str为字符串变量 create Procedure P_Wjgl as select * from v_wjgl2 --创建存储过程P_wjgl(案卷管理)